(rmail-variables): Abbreviate truename for comparison.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 8279adaad24020f5d146695776d8b82aa45b15c7..e6fc530369f1cd2ac53529c0423a30c6adb58236 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -563,7 +563,8 @@ Instead, these commands are available:
   ;; Provide default set of inboxes for primary mail file ~/RMAIL.
   (and (null rmail-inbox-list)
        (or (equal buffer-file-name (expand-file-name rmail-file-name))
-          (equal buffer-file-truename (file-truename rmail-file-name)))
+          (equal buffer-file-truename
+                 (abbreviate-file-name (file-truename rmail-file-name))))
        (setq rmail-inbox-list
             (or rmail-primary-inbox-list
                 (list (or (getenv "MAIL")